* lisp/simple.el (save-mark-and-excursion): Add declare forms.

diff --git a/lisp/simple.el b/lisp/simple.el
index bc3e7b83b8d8b2e8a3fd4debc63d150340894562..0da70976ed5ec85aba2394ef1c3b4807dbe1fcdf 100644 (file)
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -5223,6 +5223,7 @@ store it in a Lisp variable.  Example:
 (defmacro save-mark-and-excursion (&rest body)
   "Like `save-excursion', but also save and restore the mark state.
 This macro does what `save-excursion' did before Emacs 25.1."
+  (declare (indent 0) (debug t))
   (let ((saved-marker-sym (make-symbol "saved-marker")))
     `(let ((,saved-marker-sym (save-mark-and-excursion--save)))
        (unwind-protect